declaracion


    entero: a, b, c, d, i, j;
    real: real1, real2, real3, real4, real20;
    texto: txt1,txt2,txt3;

findedeclaracion

inicio
  
  i = 0;
  
  real1 = 100.345;
  real2 = 2.600;
  
  real1 = redondear ( real1) ;
  imprimir("real1");
  imprimir(real1);
  
  
    
  real2 = truncar ( real2 ) ;
  imprimir("real2");
  imprimir(real2);
fin
